int sech(int y1, int y2, int xp)
{
  int begs;
  for (begs=y1; begs<=y2; begs = begs+45)
  {
    moveto(xp, begs);
    lineto (xp, begs+15);
  }    
}

double min(int n)
{
  double tmp;
  
  for (int I=0; I<n; I++)
  {
    in>> tmp;
  }
  return tmp;
}
